home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1998 July / EnigmA AMIGA RUN 29 (1998)(G.R. Edizioni)(IT)[!][issue 1998-07 & 08].iso / earcd / phase5 / ppcrelease / examples / taskb.c < prev    next >
C/C++ Source or Header  |  1998-02-21  |  627b  |  31 lines
  1. #include <exec/types.h>
  2. #include <exec/nodes.h>
  3. #include <exec/lists.h>
  4. #include <exec/memory.h>
  5. #include <powerup/ppclib/interface.h>
  6. #include <powerup/gcclib/powerup_protos.h>
  7.  
  8. void main(void)
  9. {
  10. BPTR        MyFile;
  11. ULONG        MySignal;
  12.  
  13.   if (MyFile=PPCOpen("con:0/200/640/200/TaskB/CLOSE",MODE_NEWFILE))
  14.   {
  15.     for (;;)
  16.     {
  17.       PPCWrite(MyFile,
  18.             "Task B is active\n",
  19.             sizeof("Task B is active\n"));
  20.     }
  21.     PPCClose(MyFile);
  22.   }
  23.   else
  24.   {
  25.     PPCRawDoFmt("Couldn`t open CLI Window\n",
  26.                 NULL,
  27.                 1,                /* 0=Buffer,1=serial <> NOT supported yet */
  28.                 NULL);
  29.   }
  30. }
  31.